(openp): Initialized encoded_fn before GCPRO it.

diff --git a/src/ChangeLog b/src/ChangeLog
index 166222ae33c43d2fc506dba44aa4eda12feeadf9..4ec15ab11cc70299c33ae440f2ca6702bcc8c536 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2006-02-06  Kenichi Handa  <handa@m17n.org>
+
+       * lread.c (openp): Initialized encoded_fn before GCPRO it.
+
 2006-02-05  Ken Raeburn  <raeburn@raeburn.org>
 
        * editfns.c (Fconstrain_to_field): Fix int/Lisp_Object mixup.

diff --git a/src/lread.c b/src/lread.c
index 7be2ad8fa9b1b2e142902dec5d650efe7782efb8..acdefd81bae1c95e48a45ca46fd517af69ff8bf7 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -1079,7 +1079,7 @@ openp (path, str, suffixes, storeptr, predicate)
                            SBYTES (XCAR (tail)));
     }
 
-  string = filename = Qnil;
+  string = filename = encoded_fn = Qnil;
   GCPRO6 (str, string, filename, path, suffixes, encoded_fn);
 
   if (storeptr)